home *** CD-ROM | disk | FTP | other *** search
/ Aminet 8 / Aminet 8 (1995)(GTI - Schatztruhe)[!][Oct 1995].iso / Aminet / dev / gcc / gcc270_inclib.lha / gnu / include / ixemul.h < prev    next >
C/C++ Source or Header  |  1995-05-28  |  7KB  |  269 lines
  1. /*
  2.  *  This file is part of ixemul.library for the Amiga.
  3.  *  Copyright (C) 1991, 1992  Markus M. Wild
  4.  *
  5.  *  This library is free software; you can redistribute it and/or
  6.  *  modify it under the terms of the GNU Library General Public
  7.  *  License as published by the Free Software Foundation; either
  8.  *  version 2 of the License, or (at your option) any later version.
  9.  *
  10.  *  This library is distributed in the hope that it will be useful,
  11.  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  12.  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13.  *  Library General Public License for more details.
  14.  *
  15.  *  You should have received a copy of the GNU Library General Public
  16.  *  License along with this library; if not, write to the Free
  17.  *  Software Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  18.  *
  19.  *  ixemul.h,v 1.1.1.1 1994/04/04 04:29:38 amiga Exp
  20.  *
  21.  *  ixemul.h,v
  22.  * Revision 1.1.1.1  1994/04/04  04:29:38  amiga
  23.  * Initial CVS check in.
  24.  *
  25.  *  Revision 1.4  1993/11/05  22:14:40  mwild
  26.  *  changes there, here...
  27.  *
  28.  *  Revision 1.3  1992/10/20  16:32:33  mwild
  29.  *  *** empty log message ***
  30.  *
  31.  *  Revision 1.2  1992/07/04  19:25:26  mwild
  32.  *  change __rwport to reflect the current state of the (now global) async port
  33.  *
  34.  * Revision 1.1  1992/05/14  20:36:14  mwild
  35.  * Initial revision
  36.  *
  37.  */
  38.  
  39. #ifdef START
  40. #include "version.h"
  41.  
  42. /* definitions for the assembler startup file */
  43.  
  44. /* when I've REALLY lots of free time, I'll rewrite header files, but now... */
  45.  
  46. /* amazingly works, contains only defines ;-)) */
  47. #include <exec/alerts.h>
  48.  
  49. #define _LVOOpenLibrary        -0x228
  50. #define _LVOCloseLibrary     -0x19e
  51. #define _LVOAlert        -0x6c
  52. #define _LVOFreeMem        -0xd2
  53. #define _LVORemove        -0xfc
  54.  
  55. #define RTC_MATCHWORD    0x4afc
  56. #define RTF_AUTOINIT    (1<<7)
  57.  
  58. #define LIBF_CHANGED    (1<<1)
  59. #define LIBF_SUMUSED    (1<<2)
  60. /* seems there is an assembler bug in expression evaluation here.. */
  61. #define LIBF_CHANGED_SUMUSED 0x6
  62. #define LIBF_DELEXP    (1<<3)
  63. #define LIBB_DELEXP    3
  64.  
  65. #define LN_TYPE        8
  66. #define LN_NAME        10
  67. #define NT_LIBRARY    9
  68. #define MP_FLAGS    14
  69. #define PA_IGNORE    2
  70.  
  71. #define LIST_SIZEOF    14
  72.  
  73. #define THISTASK    276
  74.  
  75. #define INITBYTE(field,val)    .word 0xe000; .word (field); .byte (val); .byte 0
  76. #define INITWORD(field,val)    .word 0xd000; .word (field); .word (val)
  77. #define INITLONG(field,val)    .word 0xc000; .word (field); .long (val)
  78.  
  79. /*
  80.  * our library base.. 
  81.  */
  82.  
  83. /* struct library */
  84. #define    IXBASE_NODE    0
  85. #define IXBASE_FLAGS    14
  86. #define IXBASE_NEGSIZE    16
  87. #define IXBASE_POSSIZE    18
  88. #define IXBASE_VERSION    20
  89. #define IXBASE_REVISION    22
  90. #define IXBASE_IDSTRING    24
  91. #define IXBASE_SUM    28
  92. #define IXBASE_OPENCNT    32
  93. #define IXBASE_LIBRARY    34    /* size of library */
  94.  
  95. /* custom part */
  96. #define IXBASE_MYFLAGS        (IXBASE_LIBRARY + 0)
  97. #define IXBASE_SYSLIB        (IXBASE_MYFLAGS + 2)
  98. #define IXBASE_SEGLIST        (IXBASE_SYSLIB  + 4)
  99. #define IXBASE_C_PRIVATE    (IXBASE_SEGLIST + 4)
  100. /* get size of C_PRIVATE with print_base_size.c */
  101. #define IXBASE_SIZEOF        (IXBASE_C_PRIVATE + 490)
  102.  
  103. #else  /* C-part */
  104.  
  105. #include <exec/types.h>
  106. #include <exec/libraries.h>
  107. #include <exec/execbase.h>
  108. #include <exec/ports.h>
  109. #include <libraries/dosextens.h>
  110. #include <intuition/intuition.h>
  111.  
  112. #include <sys/types.h>
  113. #ifdef KERNEL
  114. #define _INTERNAL_FILE
  115. #endif
  116. #include <sys/file.h>
  117. #include <sys/param.h>
  118. #include <packets.h>
  119. #include <sys/syscall.h>
  120. #include <signal.h>
  121. #ifdef KERNEL
  122. #include <user.h>
  123. #endif
  124. #include <errno.h>
  125.  
  126. /* configure this to the number of hash queues you like, 
  127.  * use a prime number !!
  128.  */
  129. #define IX_NUM_SLEEP_QUEUES    31
  130.  
  131. struct ixemul_base {
  132.   struct Library    ix_lib;
  133.   unsigned char        ix_myflags;
  134.   unsigned char        ix_pad;
  135.   struct ExecBase*    ix_sys_base;
  136.   BPTR            ix_seg_list;
  137.  
  138.   /* needed library bases */
  139.   struct Library    *ix_dos_base;
  140.   struct IntuitionBase    *ix_intui_base;
  141.   struct GfxBase    *ix_gfx_base;
  142.   struct MathIeeeSingBasBase    *ix_ms_base;
  143.   void            *ix_libs;    /* was ix_mst_base */
  144.   struct MathIeeeDoubBasBase    *ix_md_base;
  145.   struct MathIeeeDoubTransBase    *ix_mdt_base;
  146.  
  147.  
  148.   /* the global file table with current size */
  149.   struct file        *ix_file_tab;
  150.   struct file        *ix_fileNFILE;
  151.   struct file        *ix_lastf;
  152.  
  153.   /* size of start of red zone from bottom of stack */
  154.   int            ix_red_zone_size;
  155.  
  156.   struct SignalSemaphore ix_semaph;
  157.   int            ix_membuf_limit;
  158.   
  159.   /* multiplier for id_BytesPerBlock to get to st_blksize, default 64 */
  160.   int            ix_fs_buf_factor;
  161.  
  162.   int            :21,
  163.                         ix_no_insert_disk_requester:1,
  164.                         ix_unix_pattern_matching_case_sensitive:1,
  165.                         ix_unix_pattern_matching:1,
  166.                         ix_no_ces_then_open_console:1,
  167.               ix_ignore_global_env:1,
  168.               ix_disable_fibcache:1,
  169.               ix_translate_dots:1,
  170.               ix_watch_stack:1,
  171.             ix_force_translation:1,
  172.               ix_translate_symlinks:1,
  173.             ix_translate_slash:1;
  174.  
  175.   struct MinList    ix_sleep_queues [IX_NUM_SLEEP_QUEUES];
  176.  
  177.   struct MinList    ix_socket_list;
  178. };
  179.  
  180.  
  181. /* this is the only prototype of library functions, that are really used inside
  182.  * the library. (So a user can patch a function, and the library will use
  183.  * the new entry, and not a hard compiled address */
  184. #if 0
  185. int syscall (enum _syscall_ vector, ...);
  186. #else
  187. /* now that gcc can deal with varargs-macros, this can be inlined! */
  188. #define syscall(vec, args...) \
  189.   ({register int (*_sc)()=(void *)(&((char *)ixemulbase)[-((vec)+4)*6]); _sc(args);})
  190. #endif
  191.  
  192. #ifdef KERNEL
  193. extern int ix_panic (const char *msg);
  194. extern struct ixemul_base *ixemulbase;
  195. extern struct user *curproc;
  196. #define ix (*ixemulbase)
  197. #if 0
  198. #define u_save (*(struct user *)((*(struct ExecBase **)4)->ThisTask->tc_TrapData))
  199. #define u (*curproc)
  200. #else
  201. #define u_save (*(struct user *)((*(struct ExecBase **)4)->ThisTask->tc_TrapData))
  202. #define u (*(struct user *)((*(struct ExecBase **)4)->ThisTask->tc_TrapData))
  203. #endif
  204.  
  205. static inline u_int get_usp (void) 
  206. { 
  207.   u_int res;
  208.   asm volatile ("movel    usp,%0" : "=a" (res));
  209.   return res;
  210. }
  211.  
  212. static inline void set_usp (u_int new_usp)
  213. {
  214.   asm volatile ("movel  %0,usp" : /* no output */ : "a" (new_usp));
  215. }
  216.  
  217. static inline u_int get_sp (void) 
  218. { 
  219.   u_int res;
  220.   asm volatile ("movel    sp,%0" : "=a" (res));
  221.   return res;
  222. }
  223.  
  224. static inline void set_sp (u_int new_sp)
  225. {
  226.   asm volatile ("movel  %0,sp" : /* no output */ : "a" (new_sp));
  227. }
  228.  
  229. static inline u_short get_sr (void) 
  230. { 
  231.   u_short res;
  232.   asm volatile ("movew    sr,%0" : "=g" (res));
  233.   return res;
  234. }
  235.  
  236. static inline u_int get_fp (void) 
  237. { 
  238.   u_int res;
  239.   asm volatile ("movel    a5,%0" : "=g" (res));
  240.   return res;
  241. }
  242.  
  243. #define PRIVATE
  244. #include <inline/exec.h>
  245. #undef PRIVATE
  246.  
  247. #define BASE_EXT_DECL
  248. #define BASE_EXT_DECL0
  249. #define BASE_PAR_DECL    
  250. #define BASE_PAR_DECL0    
  251. #define BASE_NAME    ((struct DosLibrary *) ix.ix_dos_base)
  252. #include <inline/dos.h>
  253.  
  254. #define errno (* u.u_errno)
  255. extern struct MsgPort *ix_async_mp;
  256. #define __rwport (ix_async_mp)
  257. #else
  258. #define ix_errno (*((struct user *)(ixbase->ix_sys_base->ThisTask->tc_TrapData))->u_errno)
  259. #endif
  260.  
  261. /* *BLOODY* commododities.h defines IX_VERSION too, so wait for our defines
  262.    to come last, and undef the sucker now!! */
  263. #undef IX_VERSION
  264. #include "version.h"
  265.  
  266. #endif
  267.  
  268.  
  269.